#@ 2,1       #say  ":PROGRAM NAME:  "+trim(descrip)
#@ fmrow+2,1 #say  ":VERSION:       "+trim(version)
#@ fmrow+2,1 #say  ":COPYRIGHT:     "+left(  trim(message1)+iif(""#trim(message2),", "+trim(message2),"") + space(50),50)
#@ fmrow+2,1 #say  ":PRICE:         "+tran(price,"99999")
#@ fmrow+2,1 #say  ":INCLUDES:      "+trim(included)
#@ fmrow+2,1 #say  ":CATEGORY:      "+category
#@ fmrow+2,1 #say  ":HARDWARE REQS: "+trim(hardware)
#@ fmrow+2,1 #say  ":SOFTWARE REQS: "+trim(software)
#@ fmrow+2,1 #say  ":DESCRIPTION:"
#@ fmrow+1,1 #say print_note("long_desc",1,80)
#@ fmrow+1,1 #say print_note("long_desc",2,80)
#@ fmrow+1,1 #say print_note("long_desc",3,80)
#@ fmrow+1,1 #say print_note("long_desc",4,80)
#@ fmrow+1,1 #say print_note("long_desc",5,80)
#@ fmrow+2,1 #say  ":KEYWORDS:      "+trim(keywords)
#@ fmrow+2,1 #say  ":AUTHOR NAME:   "+left(trim(clients->fname)+" "+trim(clients->lname)+space(40),40)
#@ fmrow+2,1 #say  ":COMPANY NAME:  "+clients->company
#@ fmrow+1,1 #say  ":ADDRESS:       "+trim(clients->add1)
#@ fmrow+1,1 #say  "                "+trim(clients->add2)
#@ fmrow+1,1 #say  "                "+trim(clients->city)+" "+clients->state+" "+clients->zip
#@ fmrow+2,1 #say  ":DAY PHONE:     "+clients->wphone
#@ fmrow+2,1 #say  ":EVENING PHONE: "+clients->hphone
#@ fmrow+2,1 #say  ":FAX PHONE:     "+clients->fphone
#@ fmrow+2,1 #say  ":COMPUSERVE ID: "+clients->compuserve
#@ fmrow+2,1 #say  ":LAST UPDATE:   "+dtoc(last_updt)
#formprint
#eject
